home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1997 February
/
EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso
/
enigma
/
earcd
/
musicali
/
tabltred.lha
/
tabulatured
/
Install_TabulaturEd
next >
Wrap
Text File
|
1996-10-13
|
3KB
|
122 lines
; $VER: Install_TabulaturEd.script V1.00 (17.02.96)
; © 1995-96 bei Rolf Schaefer
(set @language "deutsch")
(set verzeichnis "68020")
(set sprachziel "LOCALE:Catalogs/deutsch")
(set sprachquelle "Catalogs/deutsch/TabulaturEd.catalog")
; Welche Sprache soll installiert werden
(set sprache
(askchoice
(prompt "")
(choices "Deutsch" "english")
(default 0)
(help "Hier konnen sie die gewünschte Sprache einstellen")
)
)
(if (= sprache 0) (
(set sprachziel "LOCALE:Catalogs/deutsch")
(set sprachquelle "Catalogs/deutsch/TabulaturEd.catalog")
(set MSG_SelectPath "Wählen Sie bitte das Zielverzeichnis für TabulaturEd")
(set MSG_InstallingFont "Installiere jetzt den benötigten Font !!")
(set MSG_Installing "Welche Files soll ich installieren ? ")
(set MSG_Version "Welche Version möchten Sie installieren?")
(set @language "deutsch")
)
)
(if (= sprache 1) (
(set sprachziel "LOCALE:Catalogs/english")
(set sprachquelle "Catalogs/english/TabulaturEd.catalog")
(set MSG_SelectPath "Please choose the destination drawer for TabulaturEd")
(set MSG_InstallingFont "Installing the Notab font !!")
(set MSG_Installing "Which files should I install ? ")
(set MSG_Version "Which version do you want to install ?")
(set @language "english")
)
)
; Welche CPU-Version soll installiert werden
(set cpuversion
(askchoice
(prompt MSG_VERSION)
(choices "68000 Version" "68020 Version")
(if (< (database "cpu") "68020")
(default 0)
(default 1)
)
(help "Wenn Sie einen Amiga mit einem 68020 Prozessor oder"
"höher haben, können sie diese Version installieren."
"Ansonsten installieren sie die 68000 Version "
)
)
)
((if (= cpuversion 0 ))
(set verzeichnis "68000")
(set verzeichnis "68020")
)
; Frage nach dem Zielverzeichnis und kopiere die Files
(copyfiles
(prompt MSG_Installing)
(help @copyfiles-help)
(source verzeichnis )
(set svcomdir
(askdir
(prompt MSG_SelectPath)
(help @askdir-help)
(newpath)
(default "SYS:TabulaturEd")
)
)
(dest svcomdir)
(all)
(confirm)
)
(complete 70)
(copyfiles
(help @copyfiles-help)
(source "TabulaturEd.guide" )
(dest svcomdir)
)
(copyfiles
(help @copyfiles-help)
(source "TabulaturEd.guide.info" )
(dest svcomdir)
)
(complete 70)
(copyfiles
(prompt MSG_LanguageFont)
(source sprachquelle)
(dest sprachziel)
)
(copyfiles
(prompt MSG_InstallingFont)
(help @copyfiles-help)
(source "Fonts")
(dest "SYS:Fonts")
(all)
(confirm)
)